﻿Imports PTIC_Util

Public Class statsTableBDD
    Inherits BaseNotifyPropertyChangeComponentModel

    Public Sub New()
        NbLignes = 0
        NbColonnes = 0
    End Sub

#Region "Nombre de lignes"
    Public Property NbLignes As Integer
        Get
            Dim e As New PropertyGetEventArgs(Of Integer)(_NbLignes, _NbLignes)
            RaiseEvent NbLignesGet(Me, e)
            Return e.returnValue
        End Get
        Set(ByVal value As Integer)
            OnPropertyChanging("NbLignes")
            Dim e As New PropertyChangeEventArgs(Of Integer)(NbLignes, value)
            If e.IsValide Then RaiseEvent NbLignesChanging(Me, e)
            If e.IsValide Then
                _NbLignes = e.NewValue
                OnPropertyChanged("NbLignes")
                RaiseEvent NbLignesChanged(Me, e)
            End If
        End Set
    End Property
    Private _NbLignes As Integer
    Public Event NbLignesGet As PropertyGetEventHandler(Of Integer)
    Public Event NbLignesChanging As PropertyChangeEventHandler(Of Integer)
    Public Event NbLignesChanged As PropertyChangeEventHandler(Of Integer)
#End Region

#Region "Nombre de colonnes"
    Public Property NbColonnes As Integer
        Get
            Dim e As New PropertyGetEventArgs(Of Integer)(_nbColonnes, _nbColonnes)
            RaiseEvent NbColonnesGet(Me, e)
            Return e.returnValue
        End Get
        Set(ByVal value As Integer)
            OnPropertyChanging("NbColonnes")
            Dim e As New PropertyChangeEventArgs(Of Integer)(NbColonnes, value)
            If e.IsValide Then RaiseEvent NbColonnesChanging(Me, e)
            If e.IsValide Then
                _nbColonnes = e.NewValue
                OnPropertyChanged("NbColonnes")
                RaiseEvent NbColonnesChanged(Me, e)
            End If
        End Set
    End Property
    Private _NbColonnes As Integer
    Public Event NbColonnesGet As PropertyGetEventHandler(Of Integer)
    Public Event NbColonnesChanging As PropertyChangeEventHandler(Of Integer)
    Public Event NbColonnesChanged As PropertyChangeEventHandler(Of Integer)
#End Region

End Class
